home *** CD-ROM | disk | FTP | other *** search
/ boe.pres.k12.wv.us / boe.pres.k12.wv.us.zip / boe.pres.k12.wv.us / Utilities / Xerox Workcentre 5335 / Windows Scan / 64-bit_x64 / Russian / cpsimage.cab / data / xps / XpsDocument.elf < prev    next >
Text File  |  2009-04-23  |  1KB  |  55 lines
  1. #load "xps/XpsPackagePart.elf";
  2. #load "xps/XpsPage.elf";
  3.  
  4. CLASS XpsDocument EXTENDS XpsPackagePart {
  5.    // Fields
  6.    LIST pages;
  7.  
  8.    // Methods
  9.    METHOD insertPage (XpsPage page, INTEGER pgNum) {
  10.       INTEGER pgCount = this.pages.length ();
  11.  
  12.       if ((pgNum < 1) || (pgNum > pgCount+1)) {
  13.          SetStatus (
  14.              op: "stop",
  15.             msg: "Invalid page number <" + pgNum + ">\n"
  16.             );
  17.          return;
  18.          }
  19.  
  20.       this.pages.insert (entry: pgNum-1, obj: page);
  21.    }
  22.  
  23.    METHOD prependPage (XpsPage page) {
  24.       this.insertPage (page: page, pgNum: 1);
  25.    }
  26.  
  27.    METHOD appendPage (XpsPage page) {
  28.       INTEGER pgCount = this.pages.length ();
  29.       this.insertPage (page: page, pgNum: pgCount+1);
  30.    }
  31.  
  32.    METHOD removePage (INTEGER pgNum) {
  33.       this.pages.remove (entry: pgNum-1);
  34.    }
  35.  
  36.    METHOD getPage (INTEGER pgNum)
  37.      RETURNS (XpsPage page) {
  38.       INTEGER pgCount = this.pages.length ();
  39.  
  40.       if ((pgNum < 1) || (pgNum > pgCount)) {
  41.          SetStatus (
  42.              op: "stop",
  43.             msg: "Invalid page number <" + pgNum + ">\n"
  44.             );
  45.          return;
  46.          }
  47.       page = this.pages[pgNum-1];
  48.    }
  49.  
  50.    METHOD getPageCount ()
  51.      RETURNS (INTEGER count) {
  52.       count = this.pages.length ();
  53.    }
  54. }
  55.